home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 7 / Apprentice-Release7.iso / Source Code / Pascal / Applications / P4⁄Mac 2.0d4 / Test programs / hello1.p < prev    next >
Encoding:
Text File  |  1996-09-26  |  154 b   |  11 lines  |  [TEXT/Rich]
  1. program hello(input, output);
  2.  
  3. var
  4.     i:integer;
  5. begin
  6.     writeln('This is a bit too long');
  7.     writeln('Hello, World!');
  8.     for i:=0 to 10 do
  9.         writeln(i);
  10. end.
  11.